gusucode.com > 支持向量机工具箱 - LIBSVM OSU_SVM LS_SVM源码程序 > 支持向量机工具箱 - LIBSVM OSU_SVM LS_SVM\libsvm\demo1_2.m

    
% DEMO1  C Support Vector Classification with LIBSVM.
%
% A linear SVM is applied to a non-separable data set (which can be varied by
% the parame ters N, f and ov). The classifier is a C-style SVM with class
% weighting. LIBSVMSIM is used to compute a contour plot of the solution. To
% demonstrate probability estimation, all data points are marked where the
% probability of the prediction if below a certain level, e.g., pr=0.9. In this
% example arbitrary class labels are allowed.

% ------------------------------------------------------------------------------
% MATLAB Interface for LIBSVM, Version 1.2
%
% Copyright (C) 2004-2005 Michael Vogt
% Written by Michael Vogt, Atanas Ayarov and Bennet Gedan
%
% This program is free software; you can redistribute it and/or modify it
% under the terms of the GNU General Public License as published by the Free
% Software Foundation; either version 2 of the License, or (at your option)
% any later version.
% ------------------------------------------------------------------------------


clc
clear
%close all

% ------------------------------------------------------------%
% 定义核函数及相关参数

C = 200;                % 拉格朗日乘子上界

ker = struct('type','linear');
%ker = struct('type','ploy','degree',3,'offset',1);
%ker = struct('type','gauss','width',1);
%ker = struct('type','tanh','gamma',1,'offset',0);

% ker - 核参数(结构体变量)
% the following fields:
%   type   - linear :  k(x,y) = x'*y
%            poly   :  k(x,y) = (x'*y+c)^d
%            gauss  :  k(x,y) = exp(-0.5*(norm(x-y)/s)^2)
%            tanh   :  k(x,y) = tanh(g*x'*y+c)
%   degree - Degree d of polynomial kernel (positive scalar).
%   offset - Offset c of polynomial and tanh kernel (scalar, negative for tanh).
%   width  - Width s of Gauss kernel (positive scalar).
%   gamma  - Slope g of the tanh kernel (positive scalar).

% ------------------------------------------------------------%
% 构造两类训练样本

n = 50;
randn('state',6);
x1 = randn(n,2);
y1 = ones(n,1);
x2 = 5+randn(n,2);
y2 = -ones(n,1);

figure(1);
plot(x1(:,1),x1(:,2),'bx',x2(:,1),x2(:,2),'k.');
axis([-3 8 -3 8]);
title('C-SVC')
hold on;

X = [x1;x2];        % 训练样本,n×d的矩阵,n为样本个数,d为样本维数
Y = [y1;y2];        % 训练目标,n×1的矩阵,n为样本个数,值为+1或-1

% ------------------------------------------------------------%
% 训练支持向量机

tic
svm = libsvmopt(X,Y,C,ker);
t_train = toc

% svm  支持向量机(结构体变量)
% the following fields:
%   ker - 核参数
%   x - 训练样本
%   y - 训练目标;
%   a - 拉格朗日乘子

% ------------------------------------------------------------%
% 寻找支持向量

vect = svm.vect;
plot(vect(:,1),vect(:,2),'ro');

% ------------------------------------------------------------%
% 测试输出

[x1,x2] = meshgrid(-2:0.05:7,-2:0.05:7);
[rows,cols] = size(x1);
nt = rows*cols;                  % 测试样本数
Xt = [reshape(x1,nt,1),reshape(x2,nt,1)];

tic
Yd = libsvmsim(svm,Xt);           % 测试输出
t_sim = toc

Yd = reshape(Yd,rows,cols);
contour(x1,x2,Yd,[0 0],'m');       % 分类面
hold off;